(server-process-filter): Use server-switch-buffer.

diff --git a/lisp/server.el b/lisp/server.el
index 3e9ddcd0c82b68acce65adbb55c0dc6a23068582..1084aee40931df9b6a30b758d1e04cd24eadad13 100644 (file)
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -188,7 +188,7 @@ Prefix arg means just kill any existing server communications subprocess."
       (server-visit-files files client)
       ;; CLIENT is now a list (CLIENTNUM BUFFERS...)
       (setq server-clients (cons client server-clients))
-      (switch-to-buffer (nth 1 client))
+      (server-switch-buffer (nth 1 client))
       (run-hooks 'server-switch-hook)
       (message (substitute-command-keys
                "When done with a buffer, type \\[server-edit].")))))